(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 12.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[     91642,       1843]
NotebookOptionsPosition[     89407,       1798]
NotebookOutlinePosition[     89741,       1813]
CellTagsIndexPosition[     89698,       1810]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[{
 RowBox[{"ClearAll", "[", "\"\<Global`*\>\"", "]"}], "\n", 
 RowBox[{
  RowBox[{
   RowBox[{"homepath", "=", "\"\</home/danyial/my_ros_pkgs/\>\""}], ";", 
   RowBox[{"(*", 
    RowBox[{
    "Directory", " ", "to", " ", "save\:f00cread", " ", "files", " ", "to", 
     " ", "and", " ", "from"}], "*)"}], 
   RowBox[{
    RowBox[{"saveToFile", "[", "M_", "]"}], ":=", 
    RowBox[{"Export", "[", 
     RowBox[{
      RowBox[{"FileNameJoin", "[", 
       RowBox[{"{", 
        RowBox[{"homepath", ",", "\"\<dataExchangeMathROS.csv\>\""}], "}"}], 
       "]"}], ",", "M", ",", "\"\<CSV\>\""}], "]"}]}], ";"}], "\n", 
  RowBox[{"(*", 
   RowBox[{"Format", ":", 
    RowBox[{"[", 
     RowBox[{
     "velX", ",", "velY", ",", "velZ", ",", "angVelX", ",", "angVelY", ",", 
      "angVelZ"}], "]"}]}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"loadFromFile", ":=", 
    RowBox[{"Import", "[", 
     RowBox[{
     "\"\</home/danyial/my_ros_pkgs/dataExchangeMathROS.csv\>\"", ",", 
      "\"\<Data\>\""}], "]"}]}], ";"}], "\n", 
  RowBox[{"(*", 
   RowBox[{"Format", ":", 
    RowBox[{"[", 
     RowBox[{
     "posX", ",", "posY", ",", "posZ", ",", "linVelX", ",", "linVelY", ",", 
      "linVelZ", ",", "angVelX", ",", "angVelY", ",", "angVelZ", ",", "yaw"}],
      "]"}]}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"numofbots", ":=", 
   RowBox[{"Length", "[", "dataoutput", "]"}]}], ";", 
  RowBox[{"(*", 
   RowBox[{"Number", " ", "of", " ", "agents"}], "*)"}], 
  RowBox[{"dim", "=", "2"}], ";", 
  RowBox[{"(*", 
   RowBox[{"Dimension", " ", "of", " ", "the", " ", "simulation"}], "*)"}], 
  RowBox[{"(*", 
   RowBox[{"Parameters", " ", "for", " ", "the", " ", "model"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"\[Alpha]", "=", "1"}], ";"}], "\n", 
 RowBox[{
  RowBox[{"\[Beta]", "=", "5"}], ";"}], "\n", 
 RowBox[{
  RowBox[{"\[Lambda]", "=", "50"}], ";"}], "\n", 
 RowBox[{
  RowBox[{"c", "=", 
   RowBox[{"10", " ", "\:f00c", " ", "9"}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{"l", "=", 
   RowBox[{"3", " ", "\:f00c", " ", "4"}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{"h", "=", "4"}], 
  ";"}], "\[IndentingNewLine]", "loadFromFile"}], "Input",
 CellChangeTimes->{{3.7827366667340937`*^9, 3.782736680210582*^9}, {
   3.782736726344163*^9, 3.782736786405445*^9}, 3.7827369323413887`*^9, {
   3.7827421460842953`*^9, 3.782742147055461*^9}, {3.782743014587161*^9, 
   3.782743014948093*^9}, {3.782743350527383*^9, 3.782743351506089*^9}, {
   3.782745315062565*^9, 3.78274531518713*^9}, {3.782745815441725*^9, 
   3.7827458159877577`*^9}, {3.782746400796371*^9, 3.782746414091663*^9}, {
   3.782747036061069*^9, 3.78274703774194*^9}, {3.78274736368477*^9, 
   3.782747369484885*^9}, {3.7828171988160877`*^9, 3.7828172353679132`*^9}, 
   3.782819019784843*^9, {3.782819058577361*^9, 3.782819069593236*^9}, {
   3.782826359909149*^9, 3.7828263726520443`*^9}, {3.7828264230605097`*^9, 
   3.7828264307068787`*^9}, {3.7828268440576057`*^9, 3.782826881015978*^9}, 
   3.782826940857589*^9, 3.782827054103512*^9, {3.782827981190978*^9, 
   3.7828280306904783`*^9}, 3.782828075446039*^9, {3.7828282817648087`*^9, 
   3.782828286700186*^9}, {3.78282846130571*^9, 3.782828462489002*^9}, {
   3.782830071418083*^9, 3.782830073036586*^9}, {3.782830400435561*^9, 
   3.78283040054173*^9}, {3.78283043118064*^9, 3.7828304312691717`*^9}, {
   3.782830804997279*^9, 3.7828308050811234`*^9}, {3.782831025308132*^9, 
   3.782831026999721*^9}},ExpressionUUID->"b9bc1670-3890-4868-82f2-\
5ba30cb030af"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "{", "\<\"commandMatrix[vRotated[{{-48.211022933196084, 7.078267458744204, \
93.95782720325512, 1.1651819291860785, -5.213551327570177, \
1.2118398479381196, 0.06679254281137084, 0.013112244026412229, \
0.9795226264425387, 2.997630082791835}, {-43.1315601109743, \
5.317412905072413, 79.47352855300161, 5.701125453254635, 1.33413620765972, \
1.2343913079554745, -0.017535982070716726, -0.015589497279111693, \
0.9763098576065289, -1.969609589495844}, {-50.13556891259972, \
15.572484990172873, 72.8892568609089, -4.680933113431445, -4.545534447643265, \
1.0717893596943897, -0.011831596007954007, 0.03462851723288973, \
0.9460930535322428, 1.9789674390765741}, {45.38063804361184, \
-19.86825625771457, 72.49560352628097, 6.68697349239903, 0.7817867432644504, \
1.0391027439406795, 0.025888241112876704, 0.06180962391415768, \
0.912864599559228, 1.237509021815515}, {49.647234261129746, \
-9.414441350369339, 79.97661521316654, -2.9191610244031327, \
4.778563078953402, 1.1491922199667362, 0.04533311687844869, \
-0.015078704190388566, 0.952583801127097, -2.9816437609015347}, \
{-0.1611835879869983, -3.272135461207806, 185.24094864360617, \
0.9554436880743029, 0.3764557897341572, 5.031757582582179, \
-0.27249661720639023, 0.06157416466818285, 1.779891796640872, \
2.894841257947082}, {-40.420704134103985, 17.309573516343644, \
69.99031449899162, -4.541120676009503, 4.606861843856812, 1.0465217158983626, \
-0.06957667150614166, 0.011062004596323536, 0.9791390429764579, \
0.1567033531531713}, {39.619374165151115, -11.077042117239785, \
65.98871878656024, -2.815429324702874, -5.467456340798253, \
1.1719152179433379, -0.03230084235671109, 0.032453379110709876, \
1.033644452444823, -1.0968976687886425}, {43.65274715188151, \
-19.626341822284072, 73.17857122400139, 6.598470606104465, \
-1.4117730704003848, 1.0275372668990383, 0.013054820042194569, \
-0.010133824146809255, 0.9538066238531954, 0.8366350819540421}, \
{0.17056359777752367, 0.04061385568147152, 185.08419497672088, \
-0.02959398654507057, 0.10603990285479824, 5.00001266059237, \
0.001554045986010239, -0.019266582717569206, 1.7377304362220802, \
2.8939328747061994}}]]\"\>", "}"}], "}"}]], "Output",
 CellChangeTimes->{
  3.782826897779435*^9, 3.7828269661372213`*^9, {3.782828001521266*^9, 
   3.782828034466309*^9}, 3.782828086896111*^9, 3.782828315029111*^9, 
   3.78282847447683*^9, 3.78282968832622*^9, 3.782830146894787*^9, 
   3.7828302043454123`*^9, {3.782830819060512*^9, 3.782830819154131*^9}},
 CellLabel->"Out[73]=",ExpressionUUID->"9836da45-bda2-46c3-9cc1-76a71b8c64b0"]
}, Open  ]],

Cell[BoxData["\[IndentingNewLine]"], "Input",
 CellChangeTimes->{{3.7827369615965033`*^9, 3.782736965309194*^9}},
 CellLabel->"In[10]:=",ExpressionUUID->"42bce077-c774-46ba-a97a-faf427c11fa6"],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Step", " ", "size"}], "*)"}], 
  RowBox[{
   RowBox[{
    RowBox[{"rtf", "=", ".18"}], ";", 
    RowBox[{"(*", 
     RowBox[{
     "Approximate", " ", "real", " ", "time", " ", "factor", " ", "of", " ", 
      "the", " ", 
      RowBox[{"system", ".", "Displayed"}], " ", "in", " ", "Gazebo"}], 
     "*)"}], 
    RowBox[{
     RowBox[{"u", "[", "pos_", "]"}], ":=", 
     RowBox[{
      RowBox[{"c", "*", 
       RowBox[{"e", "^", "\:f000"}]}], "-", 
      RowBox[{
       RowBox[{"Sqrt", "[", 
        RowBox[{"Sum", "[", 
         RowBox[{
          RowBox[{
           RowBox[{
            RowBox[{"pos", "[", 
             RowBox[{"[", "i", "]"}], "]"}], "^", "2"}], "+", ".01"}], ",", 
          RowBox[{"{", 
           RowBox[{"i", ",", "2"}], "}"}]}], "]"}], "]"}], " ", "\:f00c", " ",
        "l\:f006"}], "-", 
      RowBox[{"e", "^", "\:f000"}], "-", 
      RowBox[{
       RowBox[{"Sqrt", "[", 
        RowBox[{"Sum", "[", 
         RowBox[{
          RowBox[{
           RowBox[{
            RowBox[{"pos", "[", 
             RowBox[{"[", "i", "]"}], "]"}], "^", "2"}], "+", ".01"}], ",", 
          RowBox[{"{", 
           RowBox[{"i", ",", "2"}], "}"}]}], "]"}], "]"}], "\:f006"}]}]}], 
    ";", 
    RowBox[{"(*", 
     RowBox[{"Swarm", " ", "potential", " ", "function"}], "*)"}], 
    RowBox[{"(*", 
     RowBox[{"Gradient", " ", "of", " ", "potential", " ", 
      RowBox[{"function", ":"}]}], "*)"}], 
    RowBox[{
     RowBox[{"gradu", "[", "pos_", "]"}], ":=", 
     RowBox[{
      RowBox[{"Grad", "[", 
       RowBox[{
        RowBox[{"u", "[", 
         RowBox[{"Table", "[", 
          RowBox[{
           RowBox[{"x", "[", "i", "]"}], ",", 
           RowBox[{"{", 
            RowBox[{"i", ",", "3"}], "}"}]}], "]"}], "]"}], ",", 
        RowBox[{"Table", "[", 
         RowBox[{
          RowBox[{"x", "[", "i", "]"}], ",", 
          RowBox[{"{", 
           RowBox[{"i", ",", "3"}], "}"}]}], "]"}]}], "]"}], "/.", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"x", "[", "i", "]"}], "\[RightArrow]", 
         RowBox[{"pos", "[", 
          RowBox[{"[", "i", "]"}], "]"}]}], ",", 
        RowBox[{"{", 
         RowBox[{"i", ",", "3"}], "}"}]}], "]"}]}]}], ";"}], "\n", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"Measure", " ", "the", " ", "velocity", " ", "from", " ", 
      RowBox[{"Gazebo", ".", "Note"}], " ", "that", " ", "Gazebo", " ", 
      "gives", " ", "the", " ", "velocity", " ", "in", " ", "terms", " ", 
      "of", " ", "global"}], ",", 
     RowBox[{"not", " ", "local", " ", 
      RowBox[{"coordinates", "."}]}]}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"velocityMeasured", "[", "data_", "]"}], ":=", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{"data", "[", 
          RowBox[{"[", "i", "]"}], "]"}], "[", 
         RowBox[{"[", "4", "]"}], "]"}], ",", 
        RowBox[{
         RowBox[{"data", "[", 
          RowBox[{"[", "i", "]"}], "]"}], "[", 
         RowBox[{"[", "5", "]"}], "]"}], ",", 
        RowBox[{
         RowBox[{"data", "[", 
          RowBox[{"[", "i", "]"}], "]"}], "[", 
         RowBox[{"[", "6", "]"}], "]"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "numofbots"}], "}"}]}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Measure", " ", "position"}], "*)"}], 
   RowBox[{
    RowBox[{
     RowBox[{"position", "[", "data_", "]"}], ":=", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"data", "[", 
           RowBox[{"[", "i", "]"}], "]"}], "[", 
          RowBox[{"[", "1", "]"}], "]"}], ",", 
         RowBox[{
          RowBox[{"data", "[", 
           RowBox[{"[", "i", "]"}], "]"}], "[", 
          RowBox[{"[", "2", "]"}], "]"}], ",", 
         RowBox[{
          RowBox[{"data", "[", 
           RowBox[{"[", "i", "]"}], "]"}], "[", 
          RowBox[{"[", "3", "]"}], "]"}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"i", ",", 
         RowBox[{"Length", "[", "data", "]"}]}], "}"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"Equation", " ", "for", " ", "the", " ", "model"}], "*)"}], "\n", 
   
   RowBox[{
    RowBox[{
     RowBox[{"rhs", "[", "data_", "]"}], ":=", 
     RowBox[{"Table\:f00f\:f000\[Alpha]", "-", 
      RowBox[{"\[Beta]", "*", 
       RowBox[{"Sum", "[", 
        RowBox[{
         RowBox[{
          RowBox[{
           RowBox[{"data", "[", 
            RowBox[{"[", "i", "]"}], "]"}], "[", 
           RowBox[{"[", "j", "]"}], "]"}], "^", "2"}], ",", 
         RowBox[{"{", 
          RowBox[{"j", ",", "4", ",", "6"}], "}"}]}], "]"}], "\:f006", "*", 
       RowBox[{"Table", "[", 
        RowBox[{
         RowBox[{
          RowBox[{"data", "[", 
           RowBox[{"[", "i", "]"}], "]"}], "[", 
          RowBox[{"[", "j", "]"}], "]"}], ",", 
         RowBox[{"{", 
          RowBox[{"j", ",", "4", ",", "6"}], "}"}]}], "]"}]}], "-", 
      RowBox[{"\:f000\[Lambda]", " ", "\:f00c", " ", "numofbots\:f006", "*", 
       RowBox[{"Sum", "[", 
        RowBox[{
         RowBox[{"gradu", "[", 
          RowBox[{"Table", "[", 
           RowBox[{
            RowBox[{
             RowBox[{
              RowBox[{"data", "[", 
               RowBox[{"[", "i", "]"}], "]"}], "[", 
              RowBox[{"[", "k", "]"}], "]"}], "-", 
             RowBox[{
              RowBox[{"data", "[", 
               RowBox[{"[", "j", "]"}], "]"}], "[", 
              RowBox[{"[", "k", "]"}], "]"}]}], ",", 
            RowBox[{"{", 
             RowBox[{"k", ",", "3"}], "}"}]}], "]"}], "]"}], ",", 
         RowBox[{"{", 
          RowBox[{"j", ",", "numofbots"}], "}"}]}], "]"}]}], "+", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0", ",", 
        RowBox[{"5", "-", 
         RowBox[{
          RowBox[{"data", "[", 
           RowBox[{"[", "i", "]"}], "]"}], "[", 
          RowBox[{"[", "3", "]"}], "]"}], "-", 
         RowBox[{
          RowBox[{"data", "[", 
           RowBox[{"[", "i", "]"}], "]"}], "[", 
          RowBox[{"[", "6", "]"}], "]"}]}]}], "}"}]}]}], ",", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"i", ",", "numofbots"}], "}"}], "\:f015"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"Find", " ", "desired", " ", "velocity"}], ",", 
     RowBox[{"rotate", " ", "it"}], ",", 
     RowBox[{
     "and", " ", "then", " ", "format", " ", "it", " ", "to", " ", 
      "export"}]}], "*)"}], 
   RowBox[{
    RowBox[{
     RowBox[{"vDesired", "[", "data_", "]"}], ":=", 
     RowBox[{
      RowBox[{"velocityMeasured", "[", "data", "]"}], "+", 
      RowBox[{"h", "*", "rtf", "*", 
       RowBox[{"rhs", "[", "data", "]"}]}]}]}], ";"}], "\n", 
   RowBox[{
    RowBox[{
     RowBox[{"vRotated", "[", "data_", "]"}], ":=", 
     RowBox[{"ParallelTable", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"RotationMatrix", "[", 
         RowBox[{
          RowBox[{"-", 
           RowBox[{
            RowBox[{"data", "[", 
             RowBox[{"[", "i", "]"}], "]"}], "[", 
            RowBox[{"[", "10", "]"}], "]"}]}], ",", 
          RowBox[{"{", 
           RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "]"}], ".", 
        RowBox[{
         RowBox[{"vDesired", "[", "data", "]"}], "[", 
         RowBox[{"[", "i", "]"}], "]"}]}], ",", 
       RowBox[{"{", 
        RowBox[{"i", ",", 
         RowBox[{"Length", "[", "data", "]"}]}], "}"}]}], "]"}]}], ";"}], 
   "\n", 
   RowBox[{
    RowBox[{"commandMatrix", "[", "vec_", "]"}], ":=", 
    RowBox[{"Table", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{"vec", "[", 
          RowBox[{"[", "i", "]"}], "]"}], "[", 
         RowBox[{"[", "1", "]"}], "]"}], ",", 
        RowBox[{
         RowBox[{"vec", "[", 
          RowBox[{"[", "i", "]"}], "]"}], "[", 
         RowBox[{"[", "2", "]"}], "]"}], ",", 
        RowBox[{
         RowBox[{"vec", "[", 
          RowBox[{"[", "i", "]"}], "]"}], "[", 
         RowBox[{"[", "3", "]"}], "]"}], ",", "0", ",", "0", ",", "0"}], 
       "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", 
        RowBox[{"Length", "[", "vec", "]"}]}], "}"}]}], "]"}]}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{3.782737009431159*^9},
 EmphasizeSyntaxErrors->True,
 CellLabel->"In[74]:=",ExpressionUUID->"ff93b36e-4f89-485f-b8a6-d0a3cbcf6e6d"],

Cell[CellGroupData[{

Cell[BoxData["0.18`"], "Input",
 NumberMarks->False,
 CellLabel->"In[14]:=",ExpressionUUID->"0580cc13-460a-4627-b369-29f0297cf3cb"],

Cell[BoxData["0.18`"], "Output",
 CellChangeTimes->{3.782817936997937*^9, 3.7828182580859222`*^9, 
  3.782818382225747*^9},
 CellLabel->"Out[14]=",ExpressionUUID->"455fb819-ebc7-4329-9a2d-bf6cca288f00"]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"RunScheduledTask", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"dataoutput", "=", "loadFromFile"}], ";", "\[IndentingNewLine]", 
      RowBox[{"vmatrix", "=", 
       RowBox[{"vRotated", "[", "dataoutput", "]"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"saveToFile", "[", 
       RowBox[{"commandMatrix", "[", "vmatrix", "]"}], "]"}], ";"}], ",", 
     "h"}], "]"}], ";"}], "\[IndentingNewLine]"}]], "Input",
 CellChangeTimes->{{3.782737028629807*^9, 3.7827370585726957`*^9}, 
   3.782818215076054*^9, 3.782818665272583*^9},
 CellLabel->"In[77]:=",ExpressionUUID->"6895579a-5b49-4bed-ad84-4d376ce45fab"],

Cell[CellGroupData[{

Cell[BoxData["%39"], "Input",
 NumberMarks->False,
 CellLabel->"In[16]:=",ExpressionUUID->"240a74de-1ea5-431f-aa8f-ed870b9cd31f"],

Cell[BoxData["%39"], "Output",
 CellChangeTimes->{3.782746908313188*^9, 3.782818258251481*^9, 
  3.782818382434906*^9},
 CellLabel->"Out[16]=",ExpressionUUID->"ec8ed32e-1cfd-4b66-b96f-cda000de17ef"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["%270"], "Input",
 NumberMarks->False,
 CellLabel->"In[17]:=",ExpressionUUID->"68c4591c-a3bc-4d15-9286-ed052c7bc4f5"],

Cell[BoxData["%270"], "Output",
 CellChangeTimes->{3.7827455238905697`*^9, 3.782818258272622*^9, 
  3.782818382473032*^9},
 CellLabel->"Out[17]=",ExpressionUUID->"96ea8492-6a2b-4b93-82e8-8634a1f5e1c2"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["%128"], "Input",
 NumberMarks->False,
 CellLabel->"In[18]:=",ExpressionUUID->"40cf0739-c6a3-4c7d-b577-2cff02497062"],

Cell[BoxData["%128"], "Output",
 CellChangeTimes->{3.782743395944211*^9, 3.782818258292169*^9, 
  3.782818382515752*^9},
 CellLabel->"Out[18]=",ExpressionUUID->"324ecbcf-1189-4e0f-a8dc-e6d39f52282b"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["%66"], "Input",
 NumberMarks->False,
 CellLabel->"In[19]:=",ExpressionUUID->"f98362f8-1233-4ab3-b0ec-dbd7e903a18c"],

Cell[BoxData["%66"], "Output",
 CellChangeTimes->{3.782742327442133*^9, 3.7827431186037207`*^9, 
  3.7828182583113213`*^9, 3.782818382556518*^9},
 CellLabel->"Out[19]=",ExpressionUUID->"2146be59-453b-4d27-bb01-99393dab7638"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Run", " ", "this", " ", "to", " ", "remove", " ", "all", " ", "scheduled",
     " ", "tasks", " ", "and", " ", "stop", " ", "the", " ", "robots"}], 
   "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"RemoveScheduledTask", "[", 
    RowBox[{"ScheduledTasks", "[", "]"}], "]"}], "\n", 
   RowBox[{
    RowBox[{"saveToFile", "[", 
     RowBox[{"commandMatrix", "[", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"i", ",", "numofbots"}], "}"}]}], "]"}], "]"}], "]"}], ";"}],
    "\n", 
   RowBox[{"{", "}"}], "\[IndentingNewLine]", "0.008875`"}]}]], "Input",
 CellChangeTimes->{
  3.7827370848210793`*^9, {3.782739862567968*^9, 3.7827398703575697`*^9}, {
   3.7828187916515207`*^9, 3.782818803056582*^9}},
 CellLabel->"In[78]:=",ExpressionUUID->"577edfff-124f-4b1f-b809-edb129d16090"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   InterpretationBox[
    RowBox[{
     TagBox["ScheduledTaskObject",
      "SummaryHead"], "[", 
     DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = 
      "Ready"}, 
      TemplateBox[{PaneSelectorBox[{False -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource[
                 "FEBitmaps", "SquarePlusIconMedium"]], 
                ButtonFunction :> (Typeset`open$$ = True), Appearance -> None,
                 Evaluator -> Automatic, Method -> "Preemptive"], 
               Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 3.5 CurrentValue["FontCapHeight"]/
                  AbsoluteCurrentValue[Magnification]}]], 
              GraphicsBox[{
                Thickness[0.0016806722689075631`], {
                 FaceForm[{
                   GrayLevel[0.93], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 RGBColor[0.699951, 0.699951, 0.699951], 
                 Opacity[1.], 
                 JoinForm[{"Miter", 10.}], 
                 
                 JoinedCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 FaceForm[{
                   RGBColor[0.5, 0.5, 0.5], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgAmJeKN3AcrTfsFzTIaOEfaOxq6TD/X18c4yDlOD8Exu6
zI34JR1Ou9aop+UqwfniLGF8upM04XyHpkfHZ0QbwPVbdDomPHUwdoCZD+OX
Ms3ikPYzgPNzOH8uSDc2huuH8WHmw/gw+2H6Ye5Ddz+Mz8Ok3S520sQhuERl
+v8FCnB+8VbR36ffCTm0Lw8/ZWRiCOfD7IPxzwTLFhnvUYDrF66cVHJWRRhu
Pow/30bnyiw1QzgfqHpC3W4TuH4YH2Y+jA+zH6Yf5j509wMALxiYpA==
                  
                  "]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 
                   3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData["
1:eJxTTMoPSmViYGAQBWIQ7aJayjTrhZ7D7ltdf1PdlR18TrDbzv6q7lD9aUNA
tpWGgxtYXt0hIHtW+RwnDQdWIRH7Y3fUHYCqQud7azg8Oj5j97QL6g4Z+R9a
T4ZoOBjM1JKYukXdof63VcG5DA2HG43FblO2Ac1LNAo1yNJwyBNqPnDKUd2B
mbNLPvmchsMXr8g2i29qDlL6d1XYEjXh/OtCnxzPs2nB+d8PpaxK2KLlsOMi
wz0mT3WHcn85sSxfbQeP/bWyFsfVHXq8XrGYbNR2EHi5fT0zkH9EYUNRBpAP
Vn8SKL/h4cupm7Qd9CYs+GH4TN1Bva5nZ/ZJbQdv807HBFYNh/VTUjuS72pD
7FXTcJgQ88/511tth9vSNYlGqQYOv1d+vOS7ycDhjgpb49TF2g4siydZMb7V
dEAPPwB9A46P
                   "], {{12.732799999999997`, 
                   18.446499999999997`}, {9.606250000000001, 
                   18.446499999999997`}, {7.071879999999999, 
                   15.912100000000002`}, {7.071879999999999, 
                   12.785499999999997`}, {7.071879999999999, 
                   9.659379999999999}, {9.606250000000001, 
                   7.124999999999999}, {12.732799999999997`, 
                   7.124999999999999}, {15.859000000000002`, 
                   7.124999999999999}, {18.393399999999996`, 
                   9.659379999999999}, {18.393399999999996`, 
                   12.785499999999997`}, {18.393399999999996`, 
                   15.912100000000002`}, {15.859000000000002`, 
                   18.446499999999997`}, {12.732799999999997`, 
                   18.446499999999997`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.892600000000002`, 13.848800000000004`}, {12.0758, 
                  13.964799999999997`}, {12.010499999999999`, 13.9324}, {
                  11.9496, 13.893399999999998`}, {11.892600000000002`, 
                  13.848800000000004`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.979700000000001`, 12.114099999999999`}, {
                  11.907399999999999`, 12.165599999999998`}, {
                  11.931199999999999`, 12.147699999999999`}, {11.9543, 
                  12.130099999999999`}, {11.979700000000001`, 
                  12.114099999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.8887, 13.846499999999999`}, {11.8891, 13.8461}, {11.8902,
                   13.846899999999998`}, {11.8914, 13.847999999999999`}, {
                  11.892600000000002`, 13.848800000000004`}, {11.8887, 
                  13.846499999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.852699999999999`, 12.2047}, {11.907399999999999`, 
                  12.165599999999998`}, {11.889800000000001`, 
                  12.178899999999999`}, {11.8734, 12.1934}, {11.8566, 
                  12.207399999999998`}, {11.852699999999999`, 12.2047}}}]}}, 
               Axes -> False, AspectRatio -> 1, 
               ImageSize -> {Automatic, 31.5}, Frame -> True, FrameTicks -> 
               None, FrameStyle -> Directive[
                 Thickness[Tiny], 
                 GrayLevel[0.7]]], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Unique ID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["12", "SummaryItem"]}]}, {
                 RowBox[{
                   TagBox["\"Repetitions: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\[Infinity]", "SummaryItem"]}]}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}], True -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource[
                 "FEBitmaps", "SquareMinusIconMedium"]], 
                ButtonFunction :> (Typeset`open$$ = False), Appearance -> 
                None, Evaluator -> Automatic, Method -> "Preemptive"], 
               Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 3.5 CurrentValue["FontCapHeight"]/
                  AbsoluteCurrentValue[Magnification]}]], 
              GraphicsBox[{
                Thickness[0.0016806722689075631`], {
                 FaceForm[{
                   GrayLevel[0.93], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 RGBColor[0.699951, 0.699951, 0.699951], 
                 Opacity[1.], 
                 JoinForm[{"Miter", 10.}], 
                 
                 JoinedCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 FaceForm[{
                   RGBColor[0.5, 0.5, 0.5], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgAmJeKN3AcrTfsFzTIaOEfaOxq6TD/X18c4yDlOD8Exu6
zI34JR1Ou9aop+UqwfniLGF8upM04XyHpkfHZ0QbwPVbdDomPHUwdoCZD+OX
Ms3ikPYzgPNzOH8uSDc2huuH8WHmw/gw+2H6Ye5Ddz+Mz8Ok3S520sQhuERl
+v8FCnB+8VbR36ffCTm0Lw8/ZWRiCOfD7IPxzwTLFhnvUYDrF66cVHJWRRhu
Pow/30bnyiw1QzgfqHpC3W4TuH4YH2Y+jA+zH6Yf5j509wMALxiYpA==
                  
                  "]], 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 
                   3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData["
1:eJxTTMoPSmViYGAQBWIQ7aJayjTrhZ7D7ltdf1PdlR18TrDbzv6q7lD9aUNA
tpWGgxtYXt0hIHtW+RwnDQdWIRH7Y3fUHYCqQud7azg8Oj5j97QL6g4Z+R9a
T4ZoOBjM1JKYukXdof63VcG5DA2HG43FblO2Ac1LNAo1yNJwyBNqPnDKUd2B
mbNLPvmchsMXr8g2i29qDlL6d1XYEjXh/OtCnxzPs2nB+d8PpaxK2KLlsOMi
wz0mT3WHcn85sSxfbQeP/bWyFsfVHXq8XrGYbNR2EHi5fT0zkH9EYUNRBpAP
Vn8SKL/h4cupm7Qd9CYs+GH4TN1Bva5nZ/ZJbQdv807HBFYNh/VTUjuS72pD
7FXTcJgQ88/511tth9vSNYlGqQYOv1d+vOS7ycDhjgpb49TF2g4siydZMb7V
dEAPPwB9A46P
                   "], {{12.732799999999997`, 
                   18.446499999999997`}, {9.606250000000001, 
                   18.446499999999997`}, {7.071879999999999, 
                   15.912100000000002`}, {7.071879999999999, 
                   12.785499999999997`}, {7.071879999999999, 
                   9.659379999999999}, {9.606250000000001, 
                   7.124999999999999}, {12.732799999999997`, 
                   7.124999999999999}, {15.859000000000002`, 
                   7.124999999999999}, {18.393399999999996`, 
                   9.659379999999999}, {18.393399999999996`, 
                   12.785499999999997`}, {18.393399999999996`, 
                   15.912100000000002`}, {15.859000000000002`, 
                   18.446499999999997`}, {12.732799999999997`, 
                   18.446499999999997`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.892600000000002`, 13.848800000000004`}, {12.0758, 
                  13.964799999999997`}, {12.010499999999999`, 13.9324}, {
                  11.9496, 13.893399999999998`}, {11.892600000000002`, 
                  13.848800000000004`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.979700000000001`, 12.114099999999999`}, {
                  11.907399999999999`, 12.165599999999998`}, {
                  11.931199999999999`, 12.147699999999999`}, {11.9543, 
                  12.130099999999999`}, {11.979700000000001`, 
                  12.114099999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.8887, 13.846499999999999`}, {11.8891, 13.8461}, {11.8902,
                   13.846899999999998`}, {11.8914, 13.847999999999999`}, {
                  11.892600000000002`, 13.848800000000004`}, {11.8887, 
                  13.846499999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.852699999999999`, 12.2047}, {11.907399999999999`, 
                  12.165599999999998`}, {11.889800000000001`, 
                  12.178899999999999`}, {11.8734, 12.1934}, {11.8566, 
                  12.207399999999998`}, {11.852699999999999`, 12.2047}}}]}}, 
               Axes -> False, AspectRatio -> 1, 
               ImageSize -> {Automatic, 31.5}, Frame -> True, FrameTicks -> 
               None, FrameStyle -> Directive[
                 Thickness[Tiny], 
                 GrayLevel[0.7]]], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Unique ID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["12", "SummaryItem"]}]}, {
                 RowBox[{
                   TagBox["\"Repetitions: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\[Infinity]", "SummaryItem"]}]}, {
                 RowBox[{
                   TagBox[
                   "\"Interval between runs: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["4", "SummaryItem"], "\[InvisibleSpace]", 
                   TagBox["\" seconds\"", "SummaryItemAnnotation"]}]}, {
                 RowBox[{
                   TagBox[
                   "\"Minimum start time: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["Automatic", "SummaryItem"]}]}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}]}, 
         Dynamic[Typeset`open$$], ImageSize -> Automatic]},
       "SummaryPanel"],
      DynamicModuleValues:>{}], "]"}],
    ScheduledTaskObject[12, 
     HoldForm[$CellContext`dataoutput = $CellContext`loadFromFile; \
$CellContext`vmatrix = $CellContext`vRotated[$CellContext`dataoutput]; \
$CellContext`saveToFile[
        $CellContext`commandMatrix[$CellContext`vmatrix]]; Null], {4, 
      DirectedInfinity[1]}, Automatic, True, "AutoRemove" -> False, 
     "EpilogFunction" :> Null, "TaskGroup" -> "Global`"],
    Editable->False,
    SelectWithContents->True,
    Selectable->False], ",", 
   InterpretationBox[
    RowBox[{
     TagBox["ScheduledTaskObject",
      "SummaryHead"], "[", 
     DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = 
      "Ready"}, 
      TemplateBox[{PaneSelectorBox[{False -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource[
                 "FEBitmaps", "SquarePlusIconMedium"]], 
                ButtonFunction :> (Typeset`open$$ = True), Appearance -> None,
                 Evaluator -> Automatic, Method -> "Preemptive"], 
               Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 3.5 CurrentValue["FontCapHeight"]/
                  AbsoluteCurrentValue[Magnification]}]], 
              GraphicsBox[{
                Thickness[0.0016806722689075631`], {
                 FaceForm[{
                   GrayLevel[0.93], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 RGBColor[0.699951, 0.699951, 0.699951], 
                 Opacity[1.], 
                 JoinForm[{"Miter", 10.}], 
                 
                 JoinedCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 FaceForm[{
                   RGBColor[0.5, 0.5, 0.5], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgAmJeKN3AcrTfsFzTIaOEfaOxq6TD/X18c4yDlOD8Exu6
zI34JR1Ou9aop+UqwfniLGF8upM04XyHpkfHZ0QbwPVbdDomPHUwdoCZD+OX
Ms3ikPYzgPNzOH8uSDc2huuH8WHmw/gw+2H6Ye5Ddz+Mz8Ok3S520sQhuERl
+v8FCnB+8VbR36ffCTm0Lw8/ZWRiCOfD7IPxzwTLFhnvUYDrF66cVHJWRRhu
Pow/30bnyiw1QzgfqHpC3W4TuH4YH2Y+jA+zH6Yf5j509wMALxiYpA==
                  
                  "]], 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 
                   3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData["
1:eJxTTMoPSmViYGAQBWIQ7aJayjTrhZ7D7ltdf1PdlR18TrDbzv6q7lD9aUNA
tpWGgxtYXt0hIHtW+RwnDQdWIRH7Y3fUHYCqQud7azg8Oj5j97QL6g4Z+R9a
T4ZoOBjM1JKYukXdof63VcG5DA2HG43FblO2Ac1LNAo1yNJwyBNqPnDKUd2B
mbNLPvmchsMXr8g2i29qDlL6d1XYEjXh/OtCnxzPs2nB+d8PpaxK2KLlsOMi
wz0mT3WHcn85sSxfbQeP/bWyFsfVHXq8XrGYbNR2EHi5fT0zkH9EYUNRBpAP
Vn8SKL/h4cupm7Qd9CYs+GH4TN1Bva5nZ/ZJbQdv807HBFYNh/VTUjuS72pD
7FXTcJgQ88/511tth9vSNYlGqQYOv1d+vOS7ycDhjgpb49TF2g4siydZMb7V
dEAPPwB9A46P
                   "], {{12.732799999999997`, 
                   18.446499999999997`}, {9.606250000000001, 
                   18.446499999999997`}, {7.071879999999999, 
                   15.912100000000002`}, {7.071879999999999, 
                   12.785499999999997`}, {7.071879999999999, 
                   9.659379999999999}, {9.606250000000001, 
                   7.124999999999999}, {12.732799999999997`, 
                   7.124999999999999}, {15.859000000000002`, 
                   7.124999999999999}, {18.393399999999996`, 
                   9.659379999999999}, {18.393399999999996`, 
                   12.785499999999997`}, {18.393399999999996`, 
                   15.912100000000002`}, {15.859000000000002`, 
                   18.446499999999997`}, {12.732799999999997`, 
                   18.446499999999997`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.892600000000002`, 13.848800000000004`}, {12.0758, 
                  13.964799999999997`}, {12.010499999999999`, 13.9324}, {
                  11.9496, 13.893399999999998`}, {11.892600000000002`, 
                  13.848800000000004`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.979700000000001`, 12.114099999999999`}, {
                  11.907399999999999`, 12.165599999999998`}, {
                  11.931199999999999`, 12.147699999999999`}, {11.9543, 
                  12.130099999999999`}, {11.979700000000001`, 
                  12.114099999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.8887, 13.846499999999999`}, {11.8891, 13.8461}, {11.8902,
                   13.846899999999998`}, {11.8914, 13.847999999999999`}, {
                  11.892600000000002`, 13.848800000000004`}, {11.8887, 
                  13.846499999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.852699999999999`, 12.2047}, {11.907399999999999`, 
                  12.165599999999998`}, {11.889800000000001`, 
                  12.178899999999999`}, {11.8734, 12.1934}, {11.8566, 
                  12.207399999999998`}, {11.852699999999999`, 12.2047}}}]}}, 
               Axes -> False, AspectRatio -> 1, 
               ImageSize -> {Automatic, 31.5}, Frame -> True, FrameTicks -> 
               None, FrameStyle -> Directive[
                 Thickness[Tiny], 
                 GrayLevel[0.7]]], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Unique ID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["11", "SummaryItem"]}]}, {
                 RowBox[{
                   TagBox["\"Repetitions: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\[Infinity]", "SummaryItem"]}]}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}], True -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource[
                 "FEBitmaps", "SquareMinusIconMedium"]], 
                ButtonFunction :> (Typeset`open$$ = False), Appearance -> 
                None, Evaluator -> Automatic, Method -> "Preemptive"], 
               Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 3.5 CurrentValue["FontCapHeight"]/
                  AbsoluteCurrentValue[Magnification]}]], 
              GraphicsBox[{
                Thickness[0.0016806722689075631`], {
                 FaceForm[{
                   GrayLevel[0.93], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 RGBColor[0.699951, 0.699951, 0.699951], 
                 Opacity[1.], 
                 JoinForm[{"Miter", 10.}], 
                 
                 JoinedCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 FaceForm[{
                   RGBColor[0.5, 0.5, 0.5], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgAmJeKN3AcrTfsFzTIaOEfaOxq6TD/X18c4yDlOD8Exu6
zI34JR1Ou9aop+UqwfniLGF8upM04XyHpkfHZ0QbwPVbdDomPHUwdoCZD+OX
Ms3ikPYzgPNzOH8uSDc2huuH8WHmw/gw+2H6Ye5Ddz+Mz8Ok3S520sQhuERl
+v8FCnB+8VbR36ffCTm0Lw8/ZWRiCOfD7IPxzwTLFhnvUYDrF66cVHJWRRhu
Pow/30bnyiw1QzgfqHpC3W4TuH4YH2Y+jA+zH6Yf5j509wMALxiYpA==
                  
                  "]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 
                   3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData["
1:eJxTTMoPSmViYGAQBWIQ7aJayjTrhZ7D7ltdf1PdlR18TrDbzv6q7lD9aUNA
tpWGgxtYXt0hIHtW+RwnDQdWIRH7Y3fUHYCqQud7azg8Oj5j97QL6g4Z+R9a
T4ZoOBjM1JKYukXdof63VcG5DA2HG43FblO2Ac1LNAo1yNJwyBNqPnDKUd2B
mbNLPvmchsMXr8g2i29qDlL6d1XYEjXh/OtCnxzPs2nB+d8PpaxK2KLlsOMi
wz0mT3WHcn85sSxfbQeP/bWyFsfVHXq8XrGYbNR2EHi5fT0zkH9EYUNRBpAP
Vn8SKL/h4cupm7Qd9CYs+GH4TN1Bva5nZ/ZJbQdv807HBFYNh/VTUjuS72pD
7FXTcJgQ88/511tth9vSNYlGqQYOv1d+vOS7ycDhjgpb49TF2g4siydZMb7V
dEAPPwB9A46P
                   "], {{12.732799999999997`, 
                   18.446499999999997`}, {9.606250000000001, 
                   18.446499999999997`}, {7.071879999999999, 
                   15.912100000000002`}, {7.071879999999999, 
                   12.785499999999997`}, {7.071879999999999, 
                   9.659379999999999}, {9.606250000000001, 
                   7.124999999999999}, {12.732799999999997`, 
                   7.124999999999999}, {15.859000000000002`, 
                   7.124999999999999}, {18.393399999999996`, 
                   9.659379999999999}, {18.393399999999996`, 
                   12.785499999999997`}, {18.393399999999996`, 
                   15.912100000000002`}, {15.859000000000002`, 
                   18.446499999999997`}, {12.732799999999997`, 
                   18.446499999999997`}}}], 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.892600000000002`, 13.848800000000004`}, {12.0758, 
                  13.964799999999997`}, {12.010499999999999`, 13.9324}, {
                  11.9496, 13.893399999999998`}, {11.892600000000002`, 
                  13.848800000000004`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.979700000000001`, 12.114099999999999`}, {
                  11.907399999999999`, 12.165599999999998`}, {
                  11.931199999999999`, 12.147699999999999`}, {11.9543, 
                  12.130099999999999`}, {11.979700000000001`, 
                  12.114099999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.8887, 13.846499999999999`}, {11.8891, 13.8461}, {11.8902,
                   13.846899999999998`}, {11.8914, 13.847999999999999`}, {
                  11.892600000000002`, 13.848800000000004`}, {11.8887, 
                  13.846499999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.852699999999999`, 12.2047}, {11.907399999999999`, 
                  12.165599999999998`}, {11.889800000000001`, 
                  12.178899999999999`}, {11.8734, 12.1934}, {11.8566, 
                  12.207399999999998`}, {11.852699999999999`, 12.2047}}}]}}, 
               Axes -> False, AspectRatio -> 1, 
               ImageSize -> {Automatic, 31.5}, Frame -> True, FrameTicks -> 
               None, FrameStyle -> Directive[
                 Thickness[Tiny], 
                 GrayLevel[0.7]]], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Unique ID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["11", "SummaryItem"]}]}, {
                 RowBox[{
                   TagBox["\"Repetitions: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\[Infinity]", "SummaryItem"]}]}, {
                 RowBox[{
                   TagBox[
                   "\"Interval between runs: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["4", "SummaryItem"], "\[InvisibleSpace]", 
                   TagBox["\" seconds\"", "SummaryItemAnnotation"]}]}, {
                 RowBox[{
                   TagBox[
                   "\"Minimum start time: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["Automatic", "SummaryItem"]}]}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}]}, 
         Dynamic[Typeset`open$$], ImageSize -> Automatic]},
       "SummaryPanel"],
      DynamicModuleValues:>{}], "]"}],
    ScheduledTaskObject[11, 
     HoldForm[$CellContext`dataoutput = $CellContext`loadFromFile; \
$CellContext`vmatrix = $CellContext`vRotated[$CellContext`dataoutput]; \
$CellContext`saveToFile[
        $CellContext`commandMatrix[$CellContext`vmatrix]]; Null], {4, 
      DirectedInfinity[1]}, Automatic, True, "AutoRemove" -> False, 
     "EpilogFunction" :> Null, "TaskGroup" -> "Global`"],
    Editable->False,
    SelectWithContents->True,
    Selectable->False], ",", 
   InterpretationBox[
    RowBox[{
     TagBox["ScheduledTaskObject",
      "SummaryHead"], "[", 
     DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = 
      "Ready"}, 
      TemplateBox[{PaneSelectorBox[{False -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource[
                 "FEBitmaps", "SquarePlusIconMedium"]], 
                ButtonFunction :> (Typeset`open$$ = True), Appearance -> None,
                 Evaluator -> Automatic, Method -> "Preemptive"], 
               Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 3.5 CurrentValue["FontCapHeight"]/
                  AbsoluteCurrentValue[Magnification]}]], 
              GraphicsBox[{
                Thickness[0.0016806722689075631`], {
                 FaceForm[{
                   GrayLevel[0.93], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 RGBColor[0.699951, 0.699951, 0.699951], 
                 Opacity[1.], 
                 JoinForm[{"Miter", 10.}], 
                 
                 JoinedCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 FaceForm[{
                   RGBColor[0.5, 0.5, 0.5], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgAmJeKN3AcrTfsFzTIaOEfaOxq6TD/X18c4yDlOD8Exu6
zI34JR1Ou9aop+UqwfniLGF8upM04XyHpkfHZ0QbwPVbdDomPHUwdoCZD+OX
Ms3ikPYzgPNzOH8uSDc2huuH8WHmw/gw+2H6Ye5Ddz+Mz8Ok3S520sQhuERl
+v8FCnB+8VbR36ffCTm0Lw8/ZWRiCOfD7IPxzwTLFhnvUYDrF66cVHJWRRhu
Pow/30bnyiw1QzgfqHpC3W4TuH4YH2Y+jA+zH6Yf5j509wMALxiYpA==
                  
                  "]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 
                   3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData["
1:eJxTTMoPSmViYGAQBWIQ7aJayjTrhZ7D7ltdf1PdlR18TrDbzv6q7lD9aUNA
tpWGgxtYXt0hIHtW+RwnDQdWIRH7Y3fUHYCqQud7azg8Oj5j97QL6g4Z+R9a
T4ZoOBjM1JKYukXdof63VcG5DA2HG43FblO2Ac1LNAo1yNJwyBNqPnDKUd2B
mbNLPvmchsMXr8g2i29qDlL6d1XYEjXh/OtCnxzPs2nB+d8PpaxK2KLlsOMi
wz0mT3WHcn85sSxfbQeP/bWyFsfVHXq8XrGYbNR2EHi5fT0zkH9EYUNRBpAP
Vn8SKL/h4cupm7Qd9CYs+GH4TN1Bva5nZ/ZJbQdv807HBFYNh/VTUjuS72pD
7FXTcJgQ88/511tth9vSNYlGqQYOv1d+vOS7ycDhjgpb49TF2g4siydZMb7V
dEAPPwB9A46P
                   "], {{12.732799999999997`, 
                   18.446499999999997`}, {9.606250000000001, 
                   18.446499999999997`}, {7.071879999999999, 
                   15.912100000000002`}, {7.071879999999999, 
                   12.785499999999997`}, {7.071879999999999, 
                   9.659379999999999}, {9.606250000000001, 
                   7.124999999999999}, {12.732799999999997`, 
                   7.124999999999999}, {15.859000000000002`, 
                   7.124999999999999}, {18.393399999999996`, 
                   9.659379999999999}, {18.393399999999996`, 
                   12.785499999999997`}, {18.393399999999996`, 
                   15.912100000000002`}, {15.859000000000002`, 
                   18.446499999999997`}, {12.732799999999997`, 
                   18.446499999999997`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.892600000000002`, 13.848800000000004`}, {12.0758, 
                  13.964799999999997`}, {12.010499999999999`, 13.9324}, {
                  11.9496, 13.893399999999998`}, {11.892600000000002`, 
                  13.848800000000004`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.979700000000001`, 12.114099999999999`}, {
                  11.907399999999999`, 12.165599999999998`}, {
                  11.931199999999999`, 12.147699999999999`}, {11.9543, 
                  12.130099999999999`}, {11.979700000000001`, 
                  12.114099999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.8887, 13.846499999999999`}, {11.8891, 13.8461}, {11.8902,
                   13.846899999999998`}, {11.8914, 13.847999999999999`}, {
                  11.892600000000002`, 13.848800000000004`}, {11.8887, 
                  13.846499999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.852699999999999`, 12.2047}, {11.907399999999999`, 
                  12.165599999999998`}, {11.889800000000001`, 
                  12.178899999999999`}, {11.8734, 12.1934}, {11.8566, 
                  12.207399999999998`}, {11.852699999999999`, 12.2047}}}]}}, 
               Axes -> False, AspectRatio -> 1, 
               ImageSize -> {Automatic, 31.5}, Frame -> True, FrameTicks -> 
               None, FrameStyle -> Directive[
                 Thickness[Tiny], 
                 GrayLevel[0.7]]], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Unique ID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["10", "SummaryItem"]}]}, {
                 RowBox[{
                   TagBox["\"Repetitions: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\[Infinity]", "SummaryItem"]}]}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}], True -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource[
                 "FEBitmaps", "SquareMinusIconMedium"]], 
                ButtonFunction :> (Typeset`open$$ = False), Appearance -> 
                None, Evaluator -> Automatic, Method -> "Preemptive"], 
               Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 3.5 CurrentValue["FontCapHeight"]/
                  AbsoluteCurrentValue[Magnification]}]], 
              GraphicsBox[{
                Thickness[0.0016806722689075631`], {
                 FaceForm[{
                   GrayLevel[0.93], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 RGBColor[0.699951, 0.699951, 0.699951], 
                 Opacity[1.], 
                 JoinForm[{"Miter", 10.}], 
                 
                 JoinedCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 FaceForm[{
                   RGBColor[0.5, 0.5, 0.5], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgAmJeKN3AcrTfsFzTIaOEfaOxq6TD/X18c4yDlOD8Exu6
zI34JR1Ou9aop+UqwfniLGF8upM04XyHpkfHZ0QbwPVbdDomPHUwdoCZD+OX
Ms3ikPYzgPNzOH8uSDc2huuH8WHmw/gw+2H6Ye5Ddz+Mz8Ok3S520sQhuERl
+v8FCnB+8VbR36ffCTm0Lw8/ZWRiCOfD7IPxzwTLFhnvUYDrF66cVHJWRRhu
Pow/30bnyiw1QzgfqHpC3W4TuH4YH2Y+jA+zH6Yf5j509wMALxiYpA==
                  
                  "]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 
                   3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData["
1:eJxTTMoPSmViYGAQBWIQ7aJayjTrhZ7D7ltdf1PdlR18TrDbzv6q7lD9aUNA
tpWGgxtYXt0hIHtW+RwnDQdWIRH7Y3fUHYCqQud7azg8Oj5j97QL6g4Z+R9a
T4ZoOBjM1JKYukXdof63VcG5DA2HG43FblO2Ac1LNAo1yNJwyBNqPnDKUd2B
mbNLPvmchsMXr8g2i29qDlL6d1XYEjXh/OtCnxzPs2nB+d8PpaxK2KLlsOMi
wz0mT3WHcn85sSxfbQeP/bWyFsfVHXq8XrGYbNR2EHi5fT0zkH9EYUNRBpAP
Vn8SKL/h4cupm7Qd9CYs+GH4TN1Bva5nZ/ZJbQdv807HBFYNh/VTUjuS72pD
7FXTcJgQ88/511tth9vSNYlGqQYOv1d+vOS7ycDhjgpb49TF2g4siydZMb7V
dEAPPwB9A46P
                   "], {{12.732799999999997`, 
                   18.446499999999997`}, {9.606250000000001, 
                   18.446499999999997`}, {7.071879999999999, 
                   15.912100000000002`}, {7.071879999999999, 
                   12.785499999999997`}, {7.071879999999999, 
                   9.659379999999999}, {9.606250000000001, 
                   7.124999999999999}, {12.732799999999997`, 
                   7.124999999999999}, {15.859000000000002`, 
                   7.124999999999999}, {18.393399999999996`, 
                   9.659379999999999}, {18.393399999999996`, 
                   12.785499999999997`}, {18.393399999999996`, 
                   15.912100000000002`}, {15.859000000000002`, 
                   18.446499999999997`}, {12.732799999999997`, 
                   18.446499999999997`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.892600000000002`, 13.848800000000004`}, {12.0758, 
                  13.964799999999997`}, {12.010499999999999`, 13.9324}, {
                  11.9496, 13.893399999999998`}, {11.892600000000002`, 
                  13.848800000000004`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.979700000000001`, 12.114099999999999`}, {
                  11.907399999999999`, 12.165599999999998`}, {
                  11.931199999999999`, 12.147699999999999`}, {11.9543, 
                  12.130099999999999`}, {11.979700000000001`, 
                  12.114099999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.8887, 13.846499999999999`}, {11.8891, 13.8461}, {11.8902,
                   13.846899999999998`}, {11.8914, 13.847999999999999`}, {
                  11.892600000000002`, 13.848800000000004`}, {11.8887, 
                  13.846499999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.852699999999999`, 12.2047}, {11.907399999999999`, 
                  12.165599999999998`}, {11.889800000000001`, 
                  12.178899999999999`}, {11.8734, 12.1934}, {11.8566, 
                  12.207399999999998`}, {11.852699999999999`, 12.2047}}}]}}, 
               Axes -> False, AspectRatio -> 1, 
               ImageSize -> {Automatic, 31.5}, Frame -> True, FrameTicks -> 
               None, FrameStyle -> Directive[
                 Thickness[Tiny], 
                 GrayLevel[0.7]]], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Unique ID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["10", "SummaryItem"]}]}, {
                 RowBox[{
                   TagBox["\"Repetitions: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\[Infinity]", "SummaryItem"]}]}, {
                 RowBox[{
                   TagBox[
                   "\"Interval between runs: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["4", "SummaryItem"], "\[InvisibleSpace]", 
                   TagBox["\" seconds\"", "SummaryItemAnnotation"]}]}, {
                 RowBox[{
                   TagBox[
                   "\"Minimum start time: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["Automatic", "SummaryItem"]}]}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}]}, 
         Dynamic[Typeset`open$$], ImageSize -> Automatic]},
       "SummaryPanel"],
      DynamicModuleValues:>{}], "]"}],
    ScheduledTaskObject[10, 
     HoldForm[$CellContext`dataoutput = $CellContext`loadFromFile; \
$CellContext`vmatrix = $CellContext`vRotated[$CellContext`dataoutput]; \
$CellContext`saveToFile[
        $CellContext`commandMatrix[$CellContext`vmatrix]]; Null], {4, 
      DirectedInfinity[1]}, Automatic, True, "AutoRemove" -> False, 
     "EpilogFunction" :> Null, "TaskGroup" -> "Global`"],
    Editable->False,
    SelectWithContents->True,
    Selectable->False], ",", 
   InterpretationBox[
    RowBox[{
     TagBox["ScheduledTaskObject",
      "SummaryHead"], "[", 
     DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = 
      "Ready"}, 
      TemplateBox[{PaneSelectorBox[{False -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource[
                 "FEBitmaps", "SquarePlusIconMedium"]], 
                ButtonFunction :> (Typeset`open$$ = True), Appearance -> None,
                 Evaluator -> Automatic, Method -> "Preemptive"], 
               Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 3.5 CurrentValue["FontCapHeight"]/
                  AbsoluteCurrentValue[Magnification]}]], 
              GraphicsBox[{
                Thickness[0.0016806722689075631`], {
                 FaceForm[{
                   GrayLevel[0.93], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 RGBColor[0.699951, 0.699951, 0.699951], 
                 Opacity[1.], 
                 JoinForm[{"Miter", 10.}], 
                 
                 JoinedCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 FaceForm[{
                   RGBColor[0.5, 0.5, 0.5], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgAmJeKN3AcrTfsFzTIaOEfaOxq6TD/X18c4yDlOD8Exu6
zI34JR1Ou9aop+UqwfniLGF8upM04XyHpkfHZ0QbwPVbdDomPHUwdoCZD+OX
Ms3ikPYzgPNzOH8uSDc2huuH8WHmw/gw+2H6Ye5Ddz+Mz8Ok3S520sQhuERl
+v8FCnB+8VbR36ffCTm0Lw8/ZWRiCOfD7IPxzwTLFhnvUYDrF66cVHJWRRhu
Pow/30bnyiw1QzgfqHpC3W4TuH4YH2Y+jA+zH6Yf5j509wMALxiYpA==
                  
                  "]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 
                   3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData["
1:eJxTTMoPSmViYGAQBWIQ7aJayjTrhZ7D7ltdf1PdlR18TrDbzv6q7lD9aUNA
tpWGgxtYXt0hIHtW+RwnDQdWIRH7Y3fUHYCqQud7azg8Oj5j97QL6g4Z+R9a
T4ZoOBjM1JKYukXdof63VcG5DA2HG43FblO2Ac1LNAo1yNJwyBNqPnDKUd2B
mbNLPvmchsMXr8g2i29qDlL6d1XYEjXh/OtCnxzPs2nB+d8PpaxK2KLlsOMi
wz0mT3WHcn85sSxfbQeP/bWyFsfVHXq8XrGYbNR2EHi5fT0zkH9EYUNRBpAP
Vn8SKL/h4cupm7Qd9CYs+GH4TN1Bva5nZ/ZJbQdv807HBFYNh/VTUjuS72pD
7FXTcJgQ88/511tth9vSNYlGqQYOv1d+vOS7ycDhjgpb49TF2g4siydZMb7V
dEAPPwB9A46P
                   "], {{12.732799999999997`, 
                   18.446499999999997`}, {9.606250000000001, 
                   18.446499999999997`}, {7.071879999999999, 
                   15.912100000000002`}, {7.071879999999999, 
                   12.785499999999997`}, {7.071879999999999, 
                   9.659379999999999}, {9.606250000000001, 
                   7.124999999999999}, {12.732799999999997`, 
                   7.124999999999999}, {15.859000000000002`, 
                   7.124999999999999}, {18.393399999999996`, 
                   9.659379999999999}, {18.393399999999996`, 
                   12.785499999999997`}, {18.393399999999996`, 
                   15.912100000000002`}, {15.859000000000002`, 
                   18.446499999999997`}, {12.732799999999997`, 
                   18.446499999999997`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.892600000000002`, 13.848800000000004`}, {12.0758, 
                  13.964799999999997`}, {12.010499999999999`, 13.9324}, {
                  11.9496, 13.893399999999998`}, {11.892600000000002`, 
                  13.848800000000004`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.979700000000001`, 12.114099999999999`}, {
                  11.907399999999999`, 12.165599999999998`}, {
                  11.931199999999999`, 12.147699999999999`}, {11.9543, 
                  12.130099999999999`}, {11.979700000000001`, 
                  12.114099999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.8887, 13.846499999999999`}, {11.8891, 13.8461}, {11.8902,
                   13.846899999999998`}, {11.8914, 13.847999999999999`}, {
                  11.892600000000002`, 13.848800000000004`}, {11.8887, 
                  13.846499999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.852699999999999`, 12.2047}, {11.907399999999999`, 
                  12.165599999999998`}, {11.889800000000001`, 
                  12.178899999999999`}, {11.8734, 12.1934}, {11.8566, 
                  12.207399999999998`}, {11.852699999999999`, 12.2047}}}]}}, 
               Axes -> False, AspectRatio -> 1, 
               ImageSize -> {Automatic, 31.5}, Frame -> True, FrameTicks -> 
               None, FrameStyle -> Directive[
                 Thickness[Tiny], 
                 GrayLevel[0.7]]], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Unique ID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["9", "SummaryItem"]}]}, {
                 RowBox[{
                   TagBox["\"Repetitions: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\[Infinity]", "SummaryItem"]}]}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}], True -> GridBox[{{
              PaneBox[
               ButtonBox[
                DynamicBox[
                 FEPrivate`FrontEndResource[
                 "FEBitmaps", "SquareMinusIconMedium"]], 
                ButtonFunction :> (Typeset`open$$ = False), Appearance -> 
                None, Evaluator -> Automatic, Method -> "Preemptive"], 
               Alignment -> {Center, Center}, ImageSize -> 
               Dynamic[{
                 Automatic, 3.5 CurrentValue["FontCapHeight"]/
                  AbsoluteCurrentValue[Magnification]}]], 
              GraphicsBox[{
                Thickness[0.0016806722689075631`], {
                 FaceForm[{
                   GrayLevel[0.93], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 RGBColor[0.699951, 0.699951, 0.699951], 
                 Opacity[1.], 
                 JoinForm[{"Miter", 10.}], 
                 
                 JoinedCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 
                  0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  25.499999999999996`, 2.5}, {25.499999999999996`, 
                  1.3953100000000003`}, {24.604699999999998`, 
                  0.49999999999999994`}, {23.5, 0.49999999999999994`}, {2.5, 
                  0.49999999999999994`}, {1.3953100000000003`, 
                  0.49999999999999994`}, {0.49999999999999994`, 
                  1.3953100000000003`}, {0.49999999999999994`, 2.5}, {
                  0.49999999999999994`, 23.5}, {0.49999999999999994`, 
                  24.604699999999998`}, {1.3953100000000003`, 
                  25.499999999999996`}, {2.5, 25.499999999999996`}, {23.5, 
                  25.499999999999996`}, {24.604699999999998`, 
                  25.499999999999996`}, {25.499999999999996`, 
                  24.604699999999998`}, {25.499999999999996`, 23.5}, {
                  25.499999999999996`, 2.5}}}]}, {
                 FaceForm[{
                   RGBColor[0.5, 0.5, 0.5], 
                   Opacity[1.]}], 
                 
                 FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 
                  3}}}, CompressedData["
1:eJxTTMoPSmVmYGBgAmJeKN3AcrTfsFzTIaOEfaOxq6TD/X18c4yDlOD8Exu6
zI34JR1Ou9aop+UqwfniLGF8upM04XyHpkfHZ0QbwPVbdDomPHUwdoCZD+OX
Ms3ikPYzgPNzOH8uSDc2huuH8WHmw/gw+2H6Ye5Ddz+Mz8Ok3S520sQhuERl
+v8FCnB+8VbR36ffCTm0Lw8/ZWRiCOfD7IPxzwTLFhnvUYDrF66cVHJWRRhu
Pow/30bnyiw1QzgfqHpC3W4TuH4YH2Y+jA+zH6Yf5j509wMALxiYpA==
                  
                  "]], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 
                   0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 
                   3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 
                   3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData["
1:eJxTTMoPSmViYGAQBWIQ7aJayjTrhZ7D7ltdf1PdlR18TrDbzv6q7lD9aUNA
tpWGgxtYXt0hIHtW+RwnDQdWIRH7Y3fUHYCqQud7azg8Oj5j97QL6g4Z+R9a
T4ZoOBjM1JKYukXdof63VcG5DA2HG43FblO2Ac1LNAo1yNJwyBNqPnDKUd2B
mbNLPvmchsMXr8g2i29qDlL6d1XYEjXh/OtCnxzPs2nB+d8PpaxK2KLlsOMi
wz0mT3WHcn85sSxfbQeP/bWyFsfVHXq8XrGYbNR2EHi5fT0zkH9EYUNRBpAP
Vn8SKL/h4cupm7Qd9CYs+GH4TN1Bva5nZ/ZJbQdv807HBFYNh/VTUjuS72pD
7FXTcJgQ88/511tth9vSNYlGqQYOv1d+vOS7ycDhjgpb49TF2g4siydZMb7V
dEAPPwB9A46P
                   "], {{12.732799999999997`, 
                   18.446499999999997`}, {9.606250000000001, 
                   18.446499999999997`}, {7.071879999999999, 
                   15.912100000000002`}, {7.071879999999999, 
                   12.785499999999997`}, {7.071879999999999, 
                   9.659379999999999}, {9.606250000000001, 
                   7.124999999999999}, {12.732799999999997`, 
                   7.124999999999999}, {15.859000000000002`, 
                   7.124999999999999}, {18.393399999999996`, 
                   9.659379999999999}, {18.393399999999996`, 
                   12.785499999999997`}, {18.393399999999996`, 
                   15.912100000000002`}, {15.859000000000002`, 
                   18.446499999999997`}, {12.732799999999997`, 
                   18.446499999999997`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.892600000000002`, 13.848800000000004`}, {12.0758, 
                  13.964799999999997`}, {12.010499999999999`, 13.9324}, {
                  11.9496, 13.893399999999998`}, {11.892600000000002`, 
                  13.848800000000004`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}}}, {{{
                  11.979700000000001`, 12.114099999999999`}, {
                  11.907399999999999`, 12.165599999999998`}, {
                  11.931199999999999`, 12.147699999999999`}, {11.9543, 
                  12.130099999999999`}, {11.979700000000001`, 
                  12.114099999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.8887, 13.846499999999999`}, {11.8891, 13.8461}, {11.8902,
                   13.846899999999998`}, {11.8914, 13.847999999999999`}, {
                  11.892600000000002`, 13.848800000000004`}, {11.8887, 
                  13.846499999999999`}}}], 
                 
                 FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}}}, {{{
                  11.852699999999999`, 12.2047}, {11.907399999999999`, 
                  12.165599999999998`}, {11.889800000000001`, 
                  12.178899999999999`}, {11.8734, 12.1934}, {11.8566, 
                  12.207399999999998`}, {11.852699999999999`, 12.2047}}}]}}, 
               Axes -> False, AspectRatio -> 1, 
               ImageSize -> {Automatic, 31.5}, Frame -> True, FrameTicks -> 
               None, FrameStyle -> Directive[
                 Thickness[Tiny], 
                 GrayLevel[0.7]]], 
              GridBox[{{
                 RowBox[{
                   TagBox["\"Unique ID: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["9", "SummaryItem"]}]}, {
                 RowBox[{
                   TagBox["\"Repetitions: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["\[Infinity]", "SummaryItem"]}]}, {
                 RowBox[{
                   TagBox[
                   "\"Interval between runs: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["4", "SummaryItem"], "\[InvisibleSpace]", 
                   TagBox["\" seconds\"", "SummaryItemAnnotation"]}]}, {
                 RowBox[{
                   TagBox[
                   "\"Minimum start time: \"", "SummaryItemAnnotation"], 
                   "\[InvisibleSpace]", 
                   TagBox["Automatic", "SummaryItem"]}]}}, 
               GridBoxAlignment -> {
                "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> 
               False, GridBoxItemSize -> {
                "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
               GridBoxSpacings -> {
                "Columns" -> {{2}}, "Rows" -> {{Automatic}}}, 
               BaseStyle -> {
                ShowStringCharacters -> False, NumberMarks -> False, 
                 PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, 
            GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, 
            GridBoxItemSize -> {
             "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, 
            BaselinePosition -> {1, 1}]}, 
         Dynamic[Typeset`open$$], ImageSize -> Automatic]},
       "SummaryPanel"],
      DynamicModuleValues:>{}], "]"}],
    ScheduledTaskObject[9, 
     HoldForm[$CellContext`dataoutput = $CellContext`loadFromFile; \
$CellContext`vmatrix = $CellContext`vRotated[$CellContext`dataoutput]; \
$CellContext`saveToFile[
        $CellContext`commandMatrix[$CellContext`vmatrix]]; Null], {4, 
      DirectedInfinity[1]}, Automatic, True, "AutoRemove" -> False, 
     "EpilogFunction" :> Null, "TaskGroup" -> "Global`"],
    Editable->False,
    SelectWithContents->True,
    Selectable->False]}], "}"}]], "Output",
 CellChangeTimes->{3.782739876095913*^9, 3.782743118667905*^9, 
  3.782818258329505*^9, 3.782818382598065*^9, 3.782818813975327*^9, 
  3.782830146568831*^9, 3.782830830314296*^9},
 CellLabel->"Out[78]=",ExpressionUUID->"0cffbe35-1bb5-40cc-9687-e805f28cf265"],

Cell[BoxData[
 RowBox[{"{", "}"}]], "Output",
 CellChangeTimes->{3.782739876095913*^9, 3.782743118667905*^9, 
  3.782818258329505*^9, 3.782818382598065*^9, 3.782818813975327*^9, 
  3.782830146568831*^9, 3.7828308303305683`*^9},
 CellLabel->"Out[80]=",ExpressionUUID->"38ee6e79-a326-4133-baa0-26d4ca51e512"],

Cell[BoxData["0.008875`"], "Output",
 CellChangeTimes->{3.782739876095913*^9, 3.782743118667905*^9, 
  3.782818258329505*^9, 3.782818382598065*^9, 3.782818813975327*^9, 
  3.782830146568831*^9, 3.782830830332244*^9},
 CellLabel->"Out[81]=",ExpressionUUID->"798a5d1d-3f91-4014-b62d-a1cf091e1da8"]
}, Open  ]]
},
WindowSize->{808, 911},
WindowMargins->{{233, Automatic}, {0, Automatic}},
FrontEndVersion->"12.0 for Linux x86 (64-bit) (April 8, 2019)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 3533, 80, 452, "Input",ExpressionUUID->"b9bc1670-3890-4868-82f2-5ba30cb030af"],
Cell[4116, 104, 2599, 41, 795, "Output",ExpressionUUID->"9836da45-bda2-46c3-9cc1-76a71b8c64b0"]
}, Open  ]],
Cell[6730, 148, 192, 2, 55, "Input",ExpressionUUID->"42bce077-c774-46ba-a97a-faf427c11fa6"],
Cell[6925, 152, 8473, 244, 640, "Input",ExpressionUUID->"ff93b36e-4f89-485f-b8a6-d0a3cbcf6e6d"],
Cell[CellGroupData[{
Cell[15423, 400, 131, 2, 31, "Input",ExpressionUUID->"0580cc13-460a-4627-b369-29f0297cf3cb"],
Cell[15557, 404, 202, 3, 35, "Output",ExpressionUUID->"455fb819-ebc7-4329-9a2d-bf6cca288f00"]
}, Open  ]],
Cell[15774, 410, 665, 15, 101, "Input",ExpressionUUID->"6895579a-5b49-4bed-ad84-4d376ce45fab"],
Cell[CellGroupData[{
Cell[16464, 429, 129, 2, 31, "Input",ExpressionUUID->"240a74de-1ea5-431f-aa8f-ed870b9cd31f"],
Cell[16596, 433, 198, 3, 35, "Output",ExpressionUUID->"ec8ed32e-1cfd-4b66-b96f-cda000de17ef"]
}, Open  ]],
Cell[CellGroupData[{
Cell[16831, 441, 130, 2, 31, "Input",ExpressionUUID->"68c4591c-a3bc-4d15-9286-ed052c7bc4f5"],
Cell[16964, 445, 201, 3, 35, "Output",ExpressionUUID->"96ea8492-6a2b-4b93-82e8-8634a1f5e1c2"]
}, Open  ]],
Cell[CellGroupData[{
Cell[17202, 453, 130, 2, 31, "Input",ExpressionUUID->"40cf0739-c6a3-4c7d-b577-2cff02497062"],
Cell[17335, 457, 199, 3, 35, "Output",ExpressionUUID->"324ecbcf-1189-4e0f-a8dc-e6d39f52282b"]
}, Open  ]],
Cell[CellGroupData[{
Cell[17571, 465, 129, 2, 31, "Input",ExpressionUUID->"f98362f8-1233-4ab3-b0ec-dbd7e903a18c"],
Cell[17703, 469, 224, 3, 35, "Output",ExpressionUUID->"2146be59-453b-4d27-bb01-99393dab7638"]
}, Open  ]],
Cell[CellGroupData[{
Cell[17964, 477, 962, 24, 124, "Input",ExpressionUUID->"577edfff-124f-4b1f-b809-edb129d16090"],
Cell[18929, 503, 69855, 1279, 136, "Output",ExpressionUUID->"0cffbe35-1bb5-40cc-9687-e805f28cf265"],
Cell[88787, 1784, 306, 5, 35, "Output",ExpressionUUID->"38ee6e79-a326-4133-baa0-26d4ca51e512"],
Cell[89096, 1791, 295, 4, 68, "Output",ExpressionUUID->"798a5d1d-3f91-4014-b62d-a1cf091e1da8"]
}, Open  ]]
}
]
*)

